home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
The CICA Windows Explosion!
/
The CICA Windows Explosion! - Disc 2.iso
/
winsock
/
ircii2-6.zip
/
SCRIPTS\KICKMENU
< prev
next >
Wrap
Text File
|
1994-12-28
|
2KB
|
34 lines
# This is an unconventional script
# taken from the ircrc of Eleazar, the way
# he posted it to alt.irc
# Use as inspiration and with caution. ;)
#
# lets me get rid of troublemakers quickly
on -join "*" ^joinhistory $0
assign j1 <none>;assign j2 <none>;assign j3 <none>;assign j4 <none>;assign j5 <none>;assign j6 <none>;assign j7 <none>;assign j8 <none>;assign j9 <none>;assign j10 <none>
alias joinhistory ^assign j10 $j9;^assign j9 $j8;^assign j8 $j7;^assign j7 $j6;^assign j6 $j5;^assign j5 $j4;^assign j4 $j3;^assign j3 $j2;^assign j2 $j1;^assign j1 $0
ALIAS showjoins echo *** Join history:;echo *** 1.$[9]j1 2.$[9]j2 3.$[9]j3 4.$[9]j4 5.$[9]j5;echo *** 6.$[9]j6 7.$[9]j7 8.$[9]j8 9.$[9]j9 10.$[9]j10;
bind meta1-j parse_command showjoins
bind meta1-k PARSE_COMMAND kill $"Kill who?" comment to follow
bind meta1-1 PARSE_COMMAND kill $j1 comment to follow
bind meta1-2 PARSE_COMMAND kill $j2 comment to follow
bind meta1-3 PARSE_COMMAND kill $j3 comment to follow
bind meta1-4 PARSE_COMMAND kill $j4 comment to follow
bind meta1-5 PARSE_COMMAND kill $j5 comment to follow
bind meta1-6 PARSE_COMMAND kill $j6 comment to follow
bind meta1-7 PARSE_COMMAND kill $j7 comment to follow
bind meta1-8 PARSE_COMMAND kill $j8 comment to follow
bind meta1-9 PARSE_COMMAND kill $j9 comment to follow
bind meta1-10 PARSE_COMMAND kill $j10 comment to follow
bind meta2-k PARSE_command kick $c $"Kick who?"
bind meta2-1 PARSE_COMMAND kick $c $j1
bind meta2-2 PARSE_COMMAND kick $c $j2
bind meta2-3 PARSE_COMMAND kick $c $j3
bind meta2-4 PARSE_COMMAND kick $c $j4
bind meta2-5 PARSE_COMMAND kick $c $j5
bind meta2-6 PARSE_COMMAND kick $c $j6
bind meta2-7 PARSE_COMMAND kick $c $j7
bind meta2-8 PARSE_COMMAND kick $c $j8
bind meta2-9 PARSE_COMMAND kick $c $j9
bind meta2-10 PARSE_COMMAND kick $c $j10